home *** CD-ROM | disk | FTP | other *** search
/ InterCD 2001 May / may_2001.iso / intercd / root / Html / ^CutePage / data1.cab / JsBox_Template / marquee.js < prev    next >
Encoding:
Text File  |  2000-05-12  |  1.2 KB  |  43 lines
  1. var msg ;
  2. function srctecmarquee2SetText(message)
  3. {
  4. msg=message;
  5. }
  6.  
  7. function scroll_status (seed)
  8. {
  9.    
  10.     
  11.     var out = " ";
  12.     var c = 1;
  13.     if (srctecmarquee2speed < seed) {
  14.             seed--;
  15.             var cmd="scroll_status(" + seed + ")";
  16.             timerTwo = window.setTimeout(cmd, 10);
  17.     }
  18.     else if (seed <= srctecmarquee2speed && 0 < seed) {
  19.             for (c=0 ; c < seed ; c++) {
  20.                     out+=" ";
  21.             }
  22.             out+=msg;
  23.             seed--;
  24.             var cmd="scroll_status(" + seed + ")";
  25.                 window.status=out;
  26.             timerTwo=window.setTimeout(cmd,10);
  27.     }
  28.     else if (seed <= 0) {
  29.             if (-seed < msg.length) {
  30.                     out+=msg.substring(-seed,msg.length);
  31.                     seed--;
  32.             var cmd="scroll_status(" + seed + ")";
  33.                     window.status=out;
  34.                     timerTwo=window.setTimeout(cmd,10);
  35.             }
  36.             else {
  37.                     window.status=" ";
  38.                     timerTwo=window.setTimeout("scroll_status(srctecmarquee2speed)",10);
  39.             }
  40.     }
  41. }
  42. // -- End of JavaScript code -------------- -->
  43.